home *** CD-ROM | disk | FTP | other *** search
/ Red Eye Press Kit / Red Eye Press Kit.iso / pc / main.dxr / SCRIPTS_77_saveGeneric.ls < prev    next >
Encoding:
Text File  |  2005-07-18  |  1.9 KB  |  75 lines

  1. property mediaFolder, downloadFile, xTension, saveState, i, o, xLib, xSprite
  2. global downloadList
  3.  
  4. on getPropertyDescriptionList me
  5.   description = [:]
  6.   addProp(description, #mediaFolder, [#default: EMPTY, #format: #string, #comment: "FOLDER:"])
  7.   addProp(description, #downloadFile, [#default: EMPTY, #format: #string, #comment: "FILE:"])
  8.   addProp(description, #xTension, [#default: EMPTY, #format: #string, #comment: ".EXT:"])
  9.   return description
  10. end
  11.  
  12. on runPropertyDialog me, description
  13.   myFile = new(xtra("fileio"))
  14.   fileLink = displayOpen(myFile)
  15.   myFile = 0
  16.   the itemDelimiter = fileSeperator()
  17.   mediaFolder = fileLink.item[fileLink.item.count - 1]
  18.   downloadFile = fileLink.item[fileLink.item.count]
  19.   the itemDelimiter = "."
  20.   xTension = downloadFile.item[2]
  21.   downloadFile = downloadFile.item[1]
  22.   setaProp(description, #mediaFolder, mediaFolder)
  23.   setaProp(description, #downloadFile, downloadFile)
  24.   setaProp(description, #xTension, xTension)
  25.   return description
  26. end
  27.  
  28. on beginSprite me
  29.   xSprite = me.spriteNum
  30.   i = sprite(xSprite).member.name & "-RO"
  31.   o = sprite(xSprite).member.name
  32.   xLib = sprite(me.spriteNum).castLibNum
  33.   updateSave()
  34. end
  35.  
  36. on mouseWithin me
  37.   sprite(xSprite).member = member(i, xLib)
  38.   cursor(280)
  39. end
  40.  
  41. on mouseLeave me
  42.   if saveState = 0 then
  43.     sprite(xSprite).member = member(o, xLib)
  44.   else
  45.     sprite(xSprite).member = member(i, xLib)
  46.   end if
  47.   cursor(0)
  48. end
  49.  
  50. on endSprite me
  51.   cursor(0)
  52. end
  53.  
  54. on mouseUp me
  55.   downloadItem = [mediaFolder, downloadFile, xTension]
  56.   if saveState = 0 then
  57.     saveState = 1
  58.     downloadList.add(downloadItem)
  59.   else
  60.     saveState = 0
  61.     downloadList.deleteAt(downloadList.getPos(downloadItem))
  62.   end if
  63. end
  64.  
  65. on updateSave me
  66.   downloadItem = [mediaFolder, downloadFile, xTension]
  67.   if downloadList.getPos(downloadItem) <> 0 then
  68.     saveState = 1
  69.     sprite(xSprite).member = member(i, xLib)
  70.   else
  71.     saveState = 0
  72.     sprite(xSprite).member = member(o, xLib)
  73.   end if
  74. end
  75.